home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d27 / chgjobl.arc / CHGJOBL2.CMD < prev    next >
OS/2 REXX Batch file  |  1991-12-04  |  977b  |  24 lines
  1.  CHGJOBLOG2: CMD        PROMPT('Chg Joblog (submitted module)')
  2.  
  3.              PARM       KWD(JOB) TYPE(L01) MIN(1) PROMPT('Job name or +
  4.                           * for current job:')
  5.  
  6.              PARM       KWD(OUTQ) TYPE(L02) DFT(*SAME) +
  7.                           SNGVAL((*SAME)) PROMPT('Output queue to +
  8.                           move spl file:')
  9.  
  10.  
  11.  L01:        QUAL       TYPE(*NAME) MIN(1) EXPR(*YES)                +
  12.  
  13.              QUAL       TYPE(*NAME) EXPR(*YES)                       +
  14.                           PROMPT('User name:')
  15.              QUAL       TYPE(*CHAR) LEN(6) FULL(*YES)                +
  16.                           EXPR(*YES) RANGE(000000 999999)            +
  17.  
  18.  L02:        QUAL       TYPE(*NAME) MIN(1) EXPR(*YES)                +
  19.  
  20.              QUAL       TYPE(*NAME) EXPR(*YES) DFT(*LIBL)            +
  21.                           SPCVAL((*LIBL))                            +
  22.                           PROMPT('Library name:')
  23.  
  24.